/ 64'er 1993 October / 64er_Magazin_93-10_1993_Markt__Technik_de_Side_A.d64 / demo.on x gosub

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 50 29 5b 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.P)[ ***|********|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 29 2a 5b 2a 2a 20 |********|**)*[** |
|00000030| 20 20 20 20 20 20 20 20 | 20 20 44 45 4d 4f 2d 50 |        |  DEMO-P|
|00000040| 52 4f 47 52 41 4d 4d 20 | 20 20 20 20 20 20 20 20 |ROGRAMM |        |
|00000050| 20 20 2a 2a 2a 2a 5b 2a | 2a 20 20 20 20 20 20 20 |  ****[*|*       |
|00000060| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000070| 20 20 20 20 20 20 20 20 | 20 20 20 20 2a 2a 2a 2a |        |    ****|
|00000080| 5b 2a 2a 20 20 20 20 20 | 20 20 20 20 20 20 20 4f |[**     |       O|
|00000090| 4e 20 58 20 47 4f 53 55 | 42 20 20 20 20 20 20 20 |N X GOSU|B       |
|000000a0| 20 20 20 20 20 20 2a 2a | 2a 29 5b 20 2a 2a 2a 2a |      **|*)[ ****|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000d0| 2a 29 03 0d 03 03 0d 03 | 0a 50 52 49 4e 54 22 93 |*)......|.PRINT".|
|000000e0| 22 0a 03 0d 03 0b 46 4f | 52 49 3d 31 54 4f 35 0b |".....FO|RI=1TO5.|
|000000f0| 03 0d 03 25 4f 4e 20 49 | 20 47 4f 53 55 42 20 54 |...%ON I| GOSUB T|
|00000100| 45 53 54 31 2c 54 45 53 | 54 32 2c 54 45 53 54 33 |EST1,TES|T2,TEST3|
|00000110| 2c 54 45 53 54 34 2c 25 | 07 54 45 53 54 35 07 03 |,TEST4,%|.TEST5..|
|00000120| 0d 03 1c 4e 45 58 54 49 | 3a 50 52 49 4e 54 22 11 |...NEXTI|:PRINT".|
|00000130| 11 46 45 52 54 49 47 21 | 22 3a 45 4e 44 1c 03 0d |.FERTIG!|":END...|
|00000140| 03 05 52 45 4d 05 03 0d | 03 03 0d 03 29 5b 2a 2a |..REM...|....)[**|
|00000150| 20 44 49 45 53 20 53 49 | 4e 44 20 44 49 45 20 55 | DIES SI|ND DIE U|
|00000160| 4e 54 45 52 50 52 4f 47 | 52 41 4d 4d 45 2e 2e 2e |NTERPROG|RAMME...|
|00000170| 2e 2a 2a 2a 29 03 0d 03 | 03 0d 03 08 5f 54 45 53 |.***)...|...._TES|
|00000180| 54 31 08 1c 3f 22 50 47 | 52 20 31 22 3a 47 4f 53 |T1..?"PG|R 1":GOS|
|00000190| 55 42 57 41 52 54 45 3a | 52 45 54 55 52 4e 1c 03 |UBWARTE:|RETURN..|
|000001a0| 0d 03 08 5f 54 45 53 54 | 32 08 1c 3f 22 50 52 47 |..._TEST|2..?"PRG|
|000001b0| 20 32 22 3a 47 4f 53 55 | 42 57 41 52 54 45 3a 52 | 2":GOSU|BWARTE:R|
|000001c0| 45 54 55 52 4e 1c 03 0d | 03 08 5f 54 45 53 54 33 |ETURN...|.._TEST3|
|000001d0| 08 1d 3f 22 50 52 47 20 | 33 22 3a 47 4f 53 55 42 |..?"PRG |3":GOSUB|
|000001e0| 20 57 41 52 54 45 3a 52 | 45 54 55 52 4e 1d 03 0d | WARTE:R|ETURN...|
|000001f0| 03 24 5f 54 45 53 54 34 | 20 3f 22 50 52 47 20 34 |.$_TEST4| ?"PRG 4|
|00000200| 22 3a 47 4f 53 55 42 20 | 57 41 52 54 45 3a 52 45 |":GOSUB |WARTE:RE|
|00000210| 54 55 52 4e 24 03 0d 03 | 23 5f 54 45 53 54 35 20 |TURN$...|#_TEST5 |
|00000220| 3f 22 50 52 47 20 35 22 | 3a 47 4f 53 55 42 57 41 |?"PRG 5"|:GOSUBWA|
|00000230| 52 54 45 3a 52 45 54 55 | 52 4e 23 03 0d 03 05 52 |RTE:RETU|RN#....R|
|00000240| 45 4d 05 03 0d 03 03 0d | 03 28 5b 2a 2a 2a 20 45 |EM......|.([*** E|
|00000250| 49 4e 45 20 4b 4c 45 49 | 4e 45 20 57 41 52 54 45 |INE KLEI|NE WARTE|
|00000260| 53 43 48 4c 45 49 46 45 | 2e 2e 2e 20 2a 2a 2a 2a |SCHLEIFE|... ****|
|00000270| 28 03 0d 03 03 0d 03 08 | 5f 57 41 52 54 45 08 1a |(.......|_WARTE..|
|00000280| 46 4f 52 48 3d 31 54 4f | 35 30 30 3a 4e 45 58 54 |FORH=1TO|500:NEXT|
|00000290| 48 3a 52 45 54 55 52 4e | 1a 03 0d 03 15 5b 2e 2e |H:RETURN|.....[..|
|000002a0| 2e 55 4e 44 20 44 41 53 | 20 45 4e 44 45 2e 2e 2e |.UND DAS| ENDE...|
|000002b0| 15 03 0d 03 03 0d 03 03 | 0d 03 00                |........|...     |
+--------+-------------------------+-------------------------+--------+--------+